home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / dev / gcc / libnix.lha / gnu / lib / libnix / sources.lha / math / trans / fmod.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-07-03  |  304 b   |  18 lines
  1. #ifdef __GNUC__
  2. #include <inline/mathieeedoubbas.h>
  3. #endif
  4.  
  5. static inline double floor(double x)
  6. { return IEEEDPFloor(x); }
  7.  
  8. static inline double ceil(double x)
  9. { return IEEEDPCeil(x); }
  10.  
  11. double fmod(double x,double y)
  12. { double a=x/y;
  13.   if(a>=0)
  14.     return x-y*floor(a);
  15.   else
  16.     return x-y*ceil(a);
  17. }
  18.